home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 June / What PC June 1996.iso / data / showcase / aboutus.dir / 00033_GRNBUWUP.BMP.ls < prev    next >
Encoding:
Text File  |  1996-02-05  |  267 b   |  15 lines
  1. on mouseDown
  2.   puppetSprite(3, 1)
  3.   set the castNum of sprite 3 to 32
  4.   updateStage()
  5.   repeat while the stillDown
  6.     nothing()
  7.   end repeat
  8.   set the castNum of sprite 3 to 33
  9.   updateStage()
  10.   puppetSprite(3, 0)
  11.   if the mouseCast = 33 then
  12.     go(5)
  13.   end if
  14. end
  15.